cmds = [
	"Accessibility Options,access.cpl",
	"Add/Remove Programs,appwiz.cpl",
	"Add Hardware Wizard,hdwwiz.cpl",
	"Automatic Updates,wuaucpl.cpl",  
	"Bluetooth Properties,bthprops.cpl",  
	"Display Properties,desk.cpl",  
	"Firewall Properties,firewall.cpl",  
	"Game Controllers,joy.cpl",  
	"Internet Options,inetcpl.cpl",
	"iSCSI Initiator,iscsicpl.cpl",  
	"Java Control Panel,jpicpl32.cpl",   
	"Licensing Mode,liccpa.cpl",  
	"Mouse Properties,main.cpl",  
	"Network Connections,ncpa.cpl",
	"Network Setup Wizard,netsetup.cpl",  
	"ODBC Properties,odbccp32.cpl",  
	"Power Options,powercfg.cpl",  
	"Regional and Language Options,intl.cpl",  
	"Sound and Audio Devices,mmsys.cpl",
	"Stored Passwords,keymgr.cpl",
	"System Properties,sysdm.cpl",  
	"Telephone and Modem Properties,telephon.cpl",
	"Time and Date Settings,timedate.cpl",  
	"User Accounts,nusrmgr.cpl",
	"Windows Security Center,wscui.cpl",
	"Wireless Link,irprops.cpl"
]

puts "Commands in Control Panel:"
puts "----------------------------------"

$i = 0
while $i < cmds.size do
	item = cmds[$i].split(',')
	puts "#$i: #{item[0]}"
	$i += 1
end

print "\nChoose a command to Run (0..#{cmds.size-1}): "
$choice = gets.to_i

if $choice.between?(0, cmds.size - 1)
	item = cmds[$choice].split(',')
	system("start #{item[1]}")
elsif
	puts "Index of command is out of range."
end


